﻿Public Class Registrar_cliente
    Inherits System.Web.UI.Page

    Dim messegbox As Object

    Private Property MessageBox As Object

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub BT_registro_Click(ByVal sender As Object, ByVal e As EventArgs) Handles BT_registro.Click


        Dim mensaje As MsgBoxStyle
        mensaje = MsgBox("¿Desea Guardar Registro?", MsgBoxStyle.OkCancel, "REGISTRO")
        If mensaje = MsgBoxResult.Ok Then
            MsgBox("Registro Guardado")
        End If



    End Sub
End Class